home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1999 #8 / 1999 CD 8 (black).iso / maskdemo / DATA1.CAB / Program_Executable_Files / Daventry / KQ / URN1.CS < prev    next >
Encoding:
Text File  |  1998-12-15  |  1.6 KB  |  57 lines
  1. echo from urn1.cs $1 $2 $3 $4
  2. if test $2 == Init
  3.       #sendEvent 0 tombdor KQDoorEvent 2
  4. else if test $2 == ConnorAction
  5.    KQMonster::speak Connor Connor 1000 95 14 0 1 1
  6. else if test $2 == Push
  7.     if test $Daventry::Church::urn == 0
  8.        #if test $3 == 5
  9.            setThirdPerson
  10.            handsOff 1
  11.            #  below was -32, now remove both push and click
  12.            KQObject::collisionType $1 -288
  13.            addMapIcon dv_portl.bmp 286 393 davmap.pbm
  14.           KQMonster::setState Connor Special 'away,AnimList=urn.anm,AnimListOn,push'
  15.           getEndLoop Connor $1 1
  16.           set Daventry::Church::urn 1
  17.        #endif
  18.     endif
  19. else if test $2 == Cue
  20.    echo $1 $2 $3
  21.    if test $3 == 10
  22.           move urn1 3 -3250 0 0 0 0 0
  23.         sendEvent 0 $1 KQAnimPlayEvent stop
  24.         KQCamera::addCamLoc 221000 183500 9762 1
  25.         KQCamera::flyToCamLoc 224500 183500 8362 4
  26.         sendEvent 4.5 $1 KQCueEvent 15 0
  27.     else if test $3 == 15
  28.         KQCamera::addCamLoc 213270 184500 9762 1
  29.         KQCamera::cutToCamLoc 216700 184000 9762
  30.           handsOff 0
  31.          KQCamera::follow Connor
  32.          setThirdPerson
  33.       sendEvent 0 Connor KQStatsChangeRequestEvent 0 0 0 0 35
  34.     else if test $3 == 300
  35.         if test $5 == away
  36.               move urn1 3 4000 0 0 0 0 0
  37.               #KQCamera::follow none
  38.               move Connor 0 215500 185200 8362 0 0 1.57
  39.               KQCamera::addCamLoc 213270 184500 9762 1
  40.             # point at door of tomb
  41.               KQCamera::cutToCamLoc 216700 184000 8362
  42.               #KQObject::collisionType $1 -32
  43.               KQObject::collisionType tombdor -32
  44.               sendEvent 5 $1 KQCueEvent 10 0
  45.               sendEvent 2 tombdor KQDoorEvent 1
  46.             KQSound::play door3.aud
  47.             getEndLoop Connor $1 0
  48.       endif
  49.    endif
  50.    endif
  51.     endif
  52. endif
  53. endif
  54. endif
  55. endif
  56.  
  57.